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14- ae 382 9}: ¥g: 9 LIBRTL.SRC LIBSTATVM, 8 2:1 . (1), 
: 1 1 MODULE LIBSSTAT_VM ( ' Gather statis ALE rom LIBSVM ; 
3 § 5 ¢ pDENT = '1=003' ' File: LIBSTATVM.B | ’ 
5 4 004 1 BEGIN : 
: 5 005 1! 3 
H § BObS : Vee RRA RARARAAAAA TERRA TREREE AREER ETRE RAEREERREREREEE ° 
: \e 7 | P 
3 8 0008 1 !* COPYRIGHT (c) 1978, 1980, 1982, 1984 BY * $ 
: 9 Bo4p 1 '® DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * ; 
; 19 Baie } 2 ALL RIGHTS RESERVED. * : 
Py .* ® ° 
; \¢ Bot¢ 1 !® THIS SOFTWARE 43 FURNISHED UNDER A LICENSE AND MAY BE USED AND sorter ® : 
: 1 01 1 !* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * : 
3 14 0014 1 !* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHE * 3 
; 15 Bole 1 !* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * | ; 
; 16 016 1 !* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * : 
; i Bole : :* TRANSFERRED. * 3 
: 'e . : 
H 19 0019 1 !* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * : 
; 20 0020 1 !* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT ® : 
P4 $3 bos) : :* CORPORATION. * Ps 
3 '® * 3 
; 23 $038 1 !* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * : 
: 24 0024 1 !* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * : 
> 2 0025 1 !* « 3 
; 0026 1 !* * 3 
4 27 0027 1 LR R ERRATA EAA E AREER e 
;: ae 0028 1! F 
: $3 ih 94 1 3 
: 30 0030 1 !++ : 
: H Oo) 1 ' FACILITY: General Library 3 
; 2 00 ¢ 1! 3 
; 8B 0033 1 | ABSTRACT: 3 
; 3¢ 0034 1! é 
3 5 0035 1! This module returns LIBSGET_VM statistics to the user. ; 
= 0036 1! These are the number of calls to GET and FREE, and the : 
g He ee : the number of bytes gotten but not yet freed. : 
3 39 s't84 : ENVIRONMENT: User mode, AST reentrant. 3 
3 $3 Bpet ! AUTHOR: John Sauter, CREATION DATE: 26-OCT-1979 
; ¢3 004 1 | MODIFIED BY: | 
3 44 Ope 1: 
3 45 45 1! 1-001 - Original. JBS_ 28-0CT-1979 
:; 86446 0046 1 ! 1-002 - Don’t use LIBSSYS_FAO, since it isn't in the sharable Library. 
:; «647 0047 1! JBS 29-OCT-1979 ~ 
, <¢ 0048 1! 1-003 - Correct a comment. JBS 30-NOV-1979 | 
: 49 0049 1 i- 
; So 050 1 
s OT 051 1 !'<BLF/PAGE> 
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| SWITCHES: 


1984 01:17:05 AX=-11 Bliss-32 V4.0-74 
-1984 93:45:38 PTARTL SREILTBSTATVM.882;1 


SWITCHES ADDRESSING_MODE (EXTERNAL = GENERAL, NONEXTERNAL = WORD_RELATIVE); 


' 

LINKAGES: 

NONE 

TABLE OF CONTENTS: 

FORWARD ROUTINE 
LIBS$SHO 


_VM, 
LIBSSTAT_VM: 


INCLUDE FILES: 


REQUIRE "RTLIN:RTLPSECT*; 


LIBRARY ‘RTLSTARLE'; 


EQUATED SYMBOLS: 


LITERAL 
K_GET = 
K"FREE = 2, 


; PSECTS 

DECLARE_PSECTS (LIB); 

i OWN STORAGE: 

; NONE 

i EXTERNAL REFERENCES: 

EXTERNAL ROUTINE 
LIBSPUT_OUTPUT; 


'¢ 


Show VM statistics as text 


Show VM statistics in binary 


DECLARE_PSECTS macro 
System symbols 


Number of calls to LIBSGET_VM 
Number of calls to LIBSFREE_VM 


Number of bytes in use 
Max codes for reporting 
Max FAO string Length 


Define psects 


! Sends string to SYSSOUTPUT 


The following are the statistics cells maintained by LIBSGET_VM. 


EXTERNAL 


OS CS oS ns 
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1eSe0-198 (3:40:08 YMG 
tTesset-FRevn=€: | Number of calls to LI 
LIBSSGL_FREVM_C, ' Number of calls to LI 
LIBSSGL_VMINUSE; ! Number of bytes alloc 


| IBSSTAT_VM 


but not freed 
'¢ 
The following are the error codes used in this module. 


EXTERNAL LITERAL 
LIBS_INVARG; ! Invalid argument error condition 


ee a a 2 tat ed 
> 2 


1:17: AX-11 Bliss-32 V4.0-74 Pa 4) 
93:45:92 LIBRTL.SRC Lies ¥Atom 68251 9 03) 


BR, 
6-Sep-1984 
4-Sep 4 
_— VM statistics 
A 
U 


1 
14-5 
GLOBAL ROUTINE LIBSSHOW_VM ( 
CODE 
ACTION 
USERARG 
2 


ode for what to show 
ction routine to print text 
ser argument for action routine 


lee 
' FUNCTIONAL DESCRIPTION: 


LIBSSHOW_VM is used to obtain the accumulated statistics 

from calls to LIBSGET_ VM and LIBSSHOW_VM. In the default 
mode, with neither COBE nor ACTION spqci tied in the call, the 

routine will output to SYSSOUTPUT a Line giving the following 

three items of information: 


999 calls to LIBSGET_VM, 999 calls to LIBSFREE_VM, 999 bytes still allocated | 
Ope tonal ty. only one of the three statistics can be output to 
SYSSOUTPUT and/or the Line of information can be passed to a 
user-specified ‘‘action routine’, for processing different from 
the default. 

CALLING SEQUENCE: 


status.wlc.v = LIBSSHOW_VM (CCCcode.rl.rJ, 
action.flc.rp], userarg.xx.xJ) 


FORMAL PARAMETERS: 


code - (Optional) Specifies the particular statistic desired. 
If given, it must be one of the following values: 
1 = Number of calls to LIBSGET 
§ = Number of calls to LIBSFREE_VM 
= Number of bytes allocated by LIBSGET_VM but not 
yet deallocated by LIBSFREE_VM. 
If omitted or zero, all three statistics will be returned 
on one Line. 


action 

userarg - (Optional) These two parameters allow the user to direct 
the output of LIBSSHOW_VM somewhere other than SYSSOUTPUT. 
If ‘‘action’’ is given, Tt is the address of a function 
procedure to call. fhe arguments to this function are 
described below. The runs ion should return either 
a success of failure condition value, which will be 
returned as the value of LIBSSHOW_VM. 


CALLING SEQUENCE OF ACTION ROUTINE: 
status.wic.v = (action) (out_string.rt.dx C, userarg.rl.vJ) | 


PAA AA OA AIM BS BS BB BB EB WWIII OPO 2 SS 


POIPIPIPIPIPIPONIPINIPINIPIPUNIPIAINININININININIAININININIPUNIPINIPONUPOPOPPoNonopofnonofnopnoponospornonn 


out_string - A descriptor of a string : 
ge mee the statistics desired. It 
is formatted exactly as it would be if 
qutpyt so SYSSOUTPUT. The leading character 
s blank. 
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IBSSTAT_VM 18-se 1984 01:17: AX=-11 Bliss-32 V4.0-74 Page 5. 
41858 12-808-13be 93:45:92 LIBRTL.SRC Libs YAtvm 62:1 . (3). 
: 179 sae userarg - if “userarg’’ is passed to LIBSSHOW_VM, | 
= 72 1! t is passed directly on to the action 
; «(181 73 1! routine. The 32-bit value in LIBSSHOW_VM's 
=. ¢ 7% «1! argument List is passed to the action 
3 i} ! routine without interpretation. 
; 185 a i IMPLICIT INPUTS: | 
i 4 9 The statistics cells maintained by LIBSVM. 
; 189 1 { IMPLICIT OUTPUTS: 
; 13) ¢ ji NONE 
; 136 6 1! 
: 13? 5 : COMPLETION CODES: 
; 195 § 1! $S$_NORMAL - Successful completion. 
; 136 88 1! LIBS_INVARG - Invalid arguments. This can be caused by an 
; 19 89 1! invalid value for ‘code’. 
3 138 90 1! Other codes as may be returned by LIBSPUT_OUTPUT or the user's 
: 13° 8 91 : } action routine. 
; o1 0 $8 i SIDE EFFECTS: 
; 08 3 1 ; NONE 
; 205 39 | in | 
: 206 98 (1 | 
; 4 8 + BEGIN 
; 209 0301 BUILTIN 
: 1? 0 8 NULLPARAME TER; 
; 1 0304 LOCAL 
; 21 305 STATUS, ! Returned condition values 
: 214 B309 TEMPCODE, ' Local value of CODE 
; 215 07 OUT_BUF : VECTOR CK_MAX_STR_LEN, BYTE], ! FAO result string 
g 1 0308 OUT-DESC : BLOCK (8, evTe}. ' Qutput string descriptor 
3 2 09 FAO_DESC : BLOCK [8 pyre ! Input string for FAO 
; + 19 FAOPRMLIST : VECTOR C3, LONG); ! Input parameter List for FAO 
; 220 Os1¢ 2 it 
; 1 \7 Set up out_string descriptor 
Py tna | 
; 5 15 OUT_DESC CDSC$W_LENGTH] = K_MAX_STR_LEN; 
> 22k 18 OUT“DESC [DSCS$B-~DTYPE] = DSCS$K_DTYPE_T: | 
; 5 1 OUT_DESC [LDSCS$B_CLASSJ = hg ae 3 
i 386 18 3 ,, QUTZDESC COSCSAZPOINTER] = GUT~BUF C03; | 
: 3 Now ‘‘output’’ the result, depending on the value of CODE. 
; : " FAO_DESC [DSC$B_DTYPE] = DSCSK_DTYPE_T; 
; 1 Z FAO_DESC CDSCS$B_CLASS) = DSCSK_CLASS_S; 
; § 5 IF (NULLPARAMETER (1)) THEN TEMPCODE = 0 ELSE TEMPCODE = ..CODE; | 
: 33 $ CASE .TEMPCODE FROM 0 TO MAX_CODE OF | 
| 
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IBSSTAT_VM 16-Se AX-11 Bliss-32 V4.0-74 Page 6 
5 808 1o735b=1982 93:45:98 Haat Ske idstaton ease. 1 9 13) | 
; § SET 
; 3 , (0) beets ! Default case, all three values 
; 240 ¢ FAO Sa tl tin POINTER) = UPLIT (BYTE (' 2UL calls to LIGSGET _vM,", 
; 241 alls to LIB boy VA, !UL 1° tF*t st ul Ra ated’) 
; 4¢ L 0334 FAO_DESC cbscsi LENGTH) = CHARCOUN alls to tieScer: “ve.", 
; 24 5 * TUL ath “to LIBSFREE_VM, UL bytes Stitt allocated’) 
3 266 $ FAO _PRALIST = ,LIBS$GL_GETVM_C; 
; 245 FAO_PRMLIST (1) = .LIBSSGL_FREVM-C; 
; re 8 FAO PRMLIST (2) = .LIBSSGL-VMINUSE; 
; 26 P 9 TATUS = SFAOL (CTRSTR = FRO_DESC, OUTLEN = OUT_DESC CDSC$W_LENGTH], OUTBUF = OUT_DESC, 
; re ? PRMLST = FAO_PRMLIST); 
; 2 0 tg 
; 1 rh way 3S ! Calls to LIBSGET_VM only 
: 3g 0345 FAO_DESC ppscserorurey? * UPLIT (BYTE (° 'UL calls to LIBSGET vm" »); 
: 54 8 $ FAO_DESC pS ay LENGTH? = ZCHARCOUNT (° !UL calls to LIBSGET_VA'); 
; 55 34 FAO_PRMLIST [OJ] = .LIBSSGL_GETVM_C; 
; 56 P Bees TATUS = SFAOL (CTRSTR = FAO DESC. OUTLEN = OUT_DESC CDSCS$W_LENGTH], OUTBUF = OUT_DESC, 
3 57 0349 PRMLST = FAO_PRMLIST); 
; 258 0350 END; 
; 259 B32! 
: 260 26 CK_FREE] : ! Calls to LIBSFREE_VM only 
; 261 035 BEGIN 
; 6¢ 0354 FAO_DESC ppeeee rotate? UPLIT (BYTE (° ‘UL calls to LIBSFREE "4 »); 
; 26 0355 FAO_DESC COSC$W_LENGTH] = 3 ~ re (" !'UL calls to LIBSFREE_VA') 
; 264 Pee FAO _PRMLIST (CO) = .LIBSSGL_F 
: 265 P 035 TATUS = $FAOL (CTRSTR = FRO. best. “OUTLEN = OUT_DESC smnichd settel, OUTBUF = OUT_DESC, 
; 266 0358 PRMLST = FAO_PRMLIST); 
: 267 0359 3 
; 268 tre 
: 44 3 61 CkK_IN USE : ! Number of bytes in use, only 
: 271 b8e8 FAO_DESC CDSCSA_POINTER] = UPLIT (BYTE (° !UL bytes still ptptee DF 
3 (af 0364 AO_DESC DS ESM LENGTH} = cree re (* !UL bytes still allocated’) 
: 7 0365 FAO_PRMLIST (OJ) = .LIBSSGL_VMINUSE; 
s 74 P 8 6 TUS = $FAOL (CTRSTR = FRO. DESC, OUTLEN = OUT_DESC seats deni OUTBUF = OUT_DESC, 
; 75 367 PRMLST = FAO_PRMLIST); 
: 27 0368 : 
3; ar 0369 
; 278 0370 COUTRANGE) : 
: 79 71 STATUS = LIBS_INVARG; 
oe i ‘ 
: 36 ie IF ( NOT .STATUS) THEN RETURN (.STATUS); 
3 Bs . IF (NULLPARAMETER (2)) ! “action’’ not given? 
3 Be 7 STATUS = LIBSPUT_OUTPUT (OUT_DESC) ! Default to SYSSOUTPUT 
; 28 4 ELSE 
3 89 1 IF (NULLPARAMETER (3)) ! “userarg’’ not given? 
: 291 : STATUS = (.ACTION) (OUT_DESC) ! Call ‘action’ without ‘‘userarg’’ 
: 292 4 ELSE 
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5 STATUS = (.ACTION) (OUT_DESC, .USERARG); 
5 RETURN (.STATUS); ! Exit 
8 END; ! End of 
TITLE 
. IDENT 
-PSECT 
$0 P.AAA: .ASCII 


: ASCII 
1 
D 
0 


6F 74 20 73 


F 7% 20 $8 


1 20 2C 4D 
ASCII 
-BLKB 
P.AAB: .ASCII 
$8 P.AAC: .ASCII 
8 
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7% 73 20 73 
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50 000000006 gf 
10 =AE FFO9 F 
AE 4D F 
6E 86 
04 AE 6 


oo-—-o—-0 —- 097 oF Oooo 


RO LSWOUVWMIOMommmmeas 


SOOCooooooooooooooo 


OOOOooooooooooeooo 


SOoooooooooooooooo 
Po 


soo, 
wir 
raw 

o 

> 

“ 

m 


oooooo 
Soooooo 
Coooooo 
QOS 
WODVIWO 
uw 
we 
2 @ 
mz 
<<@ 
~N 
wo 
< 


SSSk=3 


! Call “action” with ‘‘userarg’’ 


routine LIBSSHOW_VM 

LIBSSTAT_VM 

\1-003\ ~ 

-LIBSCODE,NOWRT, SHR, PIC,2 

\ !UL calls to LIBSGET_VM,\ 

\ !'UL calls to LIBSFREE_VM, !UL bytes sti\ 


\LlL allocated\ 
\ !UL calls to LIBSGET_VM\ 
\ !UL calls to LIBSFREE_VM\ 


3 
\ 'UL bytes still allocated\ 


LIBSPUT_OUTPUT, LIBSS$GL_GETVM_C 
LIBSSGL~FREVM_C¢ 
LIBS$S$GL-VMINUSE 
LIBS_INVARG, SYSSFAOL 
LIBSSHOW VM, Save R2,R3,R4 
LIBS$GL_UMINUSE, R4 
LIBSSGL-FREVM_C, R3 


4(AP) 
TEMPCODE 


@CODE, TEMPCODE 
dpe, #0, #3 


-4$ 
#LIBS_INVARG, STATUS 


P.AAA, FAO_DESC+4 
#77, FAO _CESC 

LIB$$GL_GETVM_C, FAO_PRMLIST 
LIBSSGL-FREVM~C. FAO™PRMLIST+4 
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SePe Se Se Se Se Se Se Ge Se Se Se Ge Ge Se Se Ge Ge Se Se Se Se Se Se Oe & 


; 0214 


0327 
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ue 
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08 AE Se 
B 

10 «AE FF41 44 
OC AE § 
of td 

10 «AE FFGA cf 
oc (AE 3 
of ack 

10 «AE FFS7 =F 
Oc AE 1A 
6E 4 

E 

18 = =AE 

\f AE 

1 AE 

000000006 99 4 
1 0 

02 6C 

05 

08 AC 

0B 

14 AE 

000000006 00 01 
03 6C 

05 

oc AC 

08 

14 AE 

08 BC 01 
Oc aC 

18 OA 

08 BC 0 


; Routine Size: 223 bytes, Routine Base: _LIBSCODE 
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LIBRTL.SRCJLIBSTATVM.B32; 1 
L{8SSGL_VMINUSE, FAO_PRMLIST+B 


P,AAB, FAO DESC +4 
#24, FAO_DESC 
BSSGL_GETVM_C, FAO_PRMLIST 


P.AAC, FAO_DESC+4 
#25, FAO DESC 
BSSGL_FREVM_C, FAO_PRMLIST 


P.AAD, FAO_DESC+4 
#26, FAO_DESC 
L 18SSGL_OMINUSE. FAO_PRMLIST 
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USERARG 
Our pest 
#2, @ACTION 
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eit 13-08-1382 94:45:92 LIBRTL.SRC Lies vAtum BS2:1 ” (4) -0 
GLOBAL ROUTINE LIBSSTAT_VM ( ' Fetch LIBSVM statistics 
CODE ' Which one to fetch 
_ VALUE ! Where to put the value 


'4¢ 
' FUNCTIONAL DESCRIPTION: 
i LIBSSTAT_VM returns to its caller one of three available 
statistits. Unlike LIBSSHOW_VM which formats the values 
for output, LIBSSTATS VM returns the value to a location 
specified as a parameter. 
Only one of oe three statistics can be returned by one call 
to LIBSSTAT “‘code’’ must be one of the three values 
: described tr Mi ipssnow. ve. A ‘code’ of zero is invalid. 
i CALLING SEQUENCE: 
i status.wlc.v = LIBSSTAT_VM (code.rl.r, value.wl.r) 


i FORMAL PARAMETERS: 


ARENRLSSSLSARRANLS 


PSE tt tt a a 9 9 9 ss a ss 5 ss ss ss a ss 5 5 2s 5 4 ss 2 5 4 9 2 4 5 _b a 5 


code - Specifies which statistic is to be returned. Allowed 
values are: 
1 = Number of calls to LIBSGET 7, 
é = Number of calls to LIBSFREE_V 
= Number of bytes on ecotes q by VT 1BSGET VM but 
| 
| 
} 


' 
' 
' 
' 
' 
' 
‘ 
' 
' 
' 
' 
' 
' 
' 
J 
' 
' 
' 
' 
' 
' 
' 
' 
: not yet freed by LIBSF 
' 
' 
' 
' 
' 
' 
' 
' 
' 
' 
' 
' 
J 
' 
' 
' 
' 
' 
' 
' 
' 
‘ 
' 


tt ot ot ot I IOOO 


MEUM 0 OONOU EWP "OOO NO UE WN 0 0@ 


Noxe that it is invalid to omit Mebaet or to give 
‘code"’ of zero. 


value = The location to store the result. ALl values are 
longword integers. 


i IMPLICIT INPUTS: 
i The statistics cells maintained by LIBSVM. 
i IMPLICIT OUTPUTS: 


SSOGFEREUS AS SHVEARUN LS SOVS AFP UW =OSB IEA OLS 


RRRRRLLRRKRRKKRRKR RPP RRPRRR RRR RRR RRR RRR RRR RRR RE Ronin 


1 . 

§ !' COMPLETION CODES: 

4 SS$_NORMAL - Successful completion 
5 L18$_INVARG - Invalid argument. 
5 3 ' SIDE EFFECTS: 

8 

9 40 NONE 
50 41 
31 4g ae 

¢ 4 
5 44 BEGIN 
54 45 

55 46 BUILTIN 


LIBSSTAT_VA 


; Routine Size: 


83 
84 
85 
86 
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12-80 8- 138 93:45:92 LIBRTL.SRCILIGSTATVM.B 231 ’ (4) 
447 NULLPARAMETER; 
rt 
44 LOCAL 
re ? STATUS; ! Returned status condition 
'¢ 
4 § Now return appropriate statistic determined by CODE 
¢ : 
§ a age FROM 1 TO MAX_CODE OF 
eg CK_GET] : ' Calls to LIBSGET_VM 
$9 -VALUE = .LIBSSGL_GETVM_C; 
Bee CK_FREE] : ! Calls to LIBSFREE_VM 
Bee? -VALUE = .LIBSSGL_FREVM_C; 
0465 CK_IN_USE) : ! Bytes outstanding 
Bee8 -VALUE = .LIBSSGL_VMINUSE; 
0468 COUTRANGE) : 
0469 RETURN (LIBS_INVARG); 
gery TES; 
047¢ RETURN (SS$_NORMAL); ' Exit 
047 END; ! End of routine LIBSSTAT_VM 
0000 00000 -ENTRY LIBSSTAT_VM, Save nothing 
98 01 04 C CF Bo 006 CASEL a@CODE, #T, #2 0456 
002 0018 O00E 00007 1$ $-1$,- 


53 bytes. 


$-1$.- 
4$-1$ 
#LIBS_INVARG, RO 


50 000000006 8F b0 99000 MOVL ; 0469 
08 BC 000000006 99 b 90015 2$: MOVL IBSS$GL_GETVM_C, @VALUE 0460 
08 BC 000000006 99 b0 9001F 3$: MOVL IBSSGL_FREVM_C, @VALUE 0463 
08 aC 000000006 99 09 ie 4$: MOVL LIBS$GL_VMINUSE. @VALUE he 
04 000 RET ; 047 
Routine Base: _LIBSCODE + 017D 
END !End of module LIBSSTAT_VM 
ELUDOM 


Oo 

w 

so 

° 


7 

IBSSTAT_VM 16-Sep-1984 01:17:05 VAX-11 Bliss-32 V4.0-74 Page 11 
4 B08 14-Sep-1984 12:39: 5:98 CLIBRTL.SRCILIBSTATVM.832;1 . (4) 
H PSECT SUMMARY 
; Name Bytes Attributes 
:  LIBSCODE 434 NOVEC,NOWRT, RD, EXE, SHR, LCL, REL, CON, PIC,ALIGN(2) 
3 Library Statistics 
Bt eee ee oe ee Pe ase SyGRel§ conecece Pages Processing 
: File Total Loaded Percent Mapped Time 
: -$255$DUA28: CSYSLIBISTARLET.L32;1 9776 10 0 581 00:00.7 


COMMAND QUALIFIERS 
FL TSS/EME CROCE SELD EME TEAL OPT EME EE) SMB TRACE/L L904, EOSaL LBSTATIR/ORJOSB IE cL IOSTATIN MSRC$:LIBSTATVM/UPDATE=(ENH$:LIBSTATVM 


ptze: 276 code + 158 data bytes 
un Time 00:05. 
othe Time: a Fh 
Lines/CPU Min: 48 
,onence/SPU-tre: 31902 
ame Used: 96 pages 
Compilation Complete 


Oo 


aef 
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